home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Invenzioni & Inventori
/
Invenzioni and Inventori (Eclectica Publishing) (1996).ISO
/
invenzio
/
timeline.dir
/
00039_Script_39
< prev
next >
Wrap
Text File
|
1983-01-29
|
605b
|
19 lines
on chiamapopinv
global attore,cisei
set cisei to true
if objectP (attore) then forget attore
set attore to window ("popup")
if the machinetype < 255 then
set the filename of attore to ("invenzioni:invenzio:popinv.dir")
else
set a to char 1 of the moviepath
set the filename of attore to (a & ":\invenzio\popinv.dir")
end if
set s to rect (the stageLeft+68,the stageTop +117,the stageLeft+356,the stageTop + 430)
set the rect of window "popup" to s
set the windowType of window "popup" to 3
open attore
moveToFront window "popup"
end